home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 67 / IOPROG_67A.ISO / soft / Tools / mwsppv4.exe / INSERT ISREADONLY.SCRIPT < prev    next >
Encoding:
Text File  |  1998-09-02  |  528 b   |  25 lines
  1. !!Script
  2. // Copyright ⌐ 1997-1998 - Modelworks Software
  3.  
  4. // Insert script helper for:
  5.  
  6. /**
  7. @Object: File 
  8. @Property: isReadOnly - returns true if the file is read only.
  9. @Syntax: File.isReadOnly(file)
  10. @Summary: isReadOnly - returns true if the file is read only
  11. */
  12.  
  13. function DoCommand()
  14. {
  15.   var editor = getActiveEditor();
  16.   if (editor)
  17.   {
  18.     var selection = editor.getSelection();
  19.     editor.replace("File.isReadOnly(file)", selection);
  20.     editor.setActive("Insert file.isReadOnly");
  21.   }
  22. }
  23.  
  24. !!/Script
  25.